unit about;\r
\r
{\r
- Copyright (C) 2005 Olaf Klein, o.b.klein@gpsbabel.org\r
+ Copyright (C) 2005,2006 Olaf Klein, o.b.klein@gpsbabel.org\r
\r
This program is free software; you can redistribute it and/or modify\r
it under the terms of the GNU General Public License as published by\r
lbSFURL.Left := lbHint1.Left + lbHint1.Width + 4;\r
lbTranslators.Caption := lbTranslators.Caption + ':';\r
\r
- lbxTranslators.Items.Add(_('German by Olaf Klein'));\r
- lbxTranslators.Items.Add(_('French by Lilian Morinon'));\r
-\r
+ lbxTranslators.Items.Add(_('German') + ' ' + _('by') + ' Olaf Klein');\r
+ lbxTranslators.Items.Add(_('French') + ' ' + _('by') + ' Lilian Morinon');\r
+ lbxTranslators.Items.Add(_('Spanish') + ' ' + _('by') + ' Daniel Diaz');\r
end;\r
\r
procedure TfrmAbout.lbURLMouseMove(Sender: TObject; Shift: TShiftState; X,\r
s := Builtin.Strings[i];\r
if (s = '') then Continue;\r
\r
- if (CompareText(s, 'de') = 0) then sx := 'German' else\r
- if (CompareText(s, 'es') = 0) then sx := 'Spanish' else\r
- if (CompareText(s, 'fr') = 0) then sx := 'French' else\r
- if (CompareText(s, 'en') = 0) then sx := 'English' else\r
+ if (CompareText(s, 'de') = 0) then sx := _('German') else\r
+ if (CompareText(s, 'es') = 0) then sx := _('Spanish') else\r
+ if (CompareText(s, 'fr') = 0) then sx := _('French') else\r
+ if (CompareText(s, 'en') = 0) then sx := _('English') else\r
sx := '???';\r
\r
sx := Format('%s - %s', [s, sx]);\r